var k
var l
eoe lab3
eob lab3
lab3:

mov k,esp
add k,1c
mov l,[k]

cmp l,400000

je lab4
esto
jmp lab3
lab4:

eob lab5
mov k,eip
add k,3d
bp k
esto

lab5:
ret